**********************************************************************************************
****Do-File: Staff/Wenzelburger "The partisan politics of the penal-welfare nexus"************
**********************************************************************************************
****last change: 2.3.2020, GW*****************************************************************
**********************************************************************************************

**DV: Penal policy Change (Bew)*********************************************

***Online Appendix Table 1 (Descriptives parties)

tabstat proz_kon proz_lib proz_marklib proz_leftlib proz_gr proz_sd, by(country) stat(n mean max min sd)


***Table 3

ologit Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr deficit ue_t6 foc_diffsvs_uvu cdum*, vce(rob) //M1

ologit Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr deficit ue_t6 netmigr cdum*, vce(rob) //M2

ologit Bew netch_sum6 proz_sd proz_leftlib proz_gr deficit ue_t6 homicid cdum*, vce(rob) //M3

ologit Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob) //M4

ologit Bew netch_sum6 proz_sd proz_leftlib proz_gr netmigr cdum*, vce(rob) //M5

ologit Bew netch_sum6 proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob) //M6

reg Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob) //M7

reg Bew netch_sum6 proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob) //M8

reg Bew c.netch_sum6##c.proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob) //M9

reg Bew c.netch_sum6##c.proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob) //M10

**Figure 5
reg Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob)
margins, at (proz_kon= (0 100)) l(95)
marginsplot
graph save directkon.gph, replace

reg Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob)
margins, at (proz_marklib= (0 100)) l(95)
marginsplot
graph save directmarklib.gph, replace

reg Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob)
margins, at (proz_leftlib= (0 100)) l(95)
marginsplot
graph save directleftlib.gph, replace

reg Bew netch_sum6 proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob)
margins, at (proz_gr= (0 100)) l(95)
marginsplot
graph save directgr.gph, replace

reg Bew netch_sum6 proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob) //abgebaut
margins, at (proz_sd_3w= (0 100)) l(95)
marginsplot
graph save directsd.gph, replace

**Figure 6
reg Bew c.netch_sum6##c.proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob)
margins, at (netch = (-10 (5) 10) proz_sd = (0 100)) l(95)
marginsplot, addplot (histogram netch_sum6)
graph save interac_3sd.gph, replace

************Appendix Table A2************

ologit Bew c.netch_sum6##c.proz_kon proz_marklib proz_leftlib proz_gr defici netmigr cdum*, vce(rob) //M1

ologit Bew c.netch_sum6##c.proz_marklib proz_kon proz_leftlib proz_gr defici netmigr cdum*, vce(rob) //M2

ologit Bew c.netch_sum6##c.proz_leftlib proz_kon proz_marklib proz_gr defici netmigr cdum*, vce(rob) //M3

ologit Bew c.netch_sum6##c.proz_gr proz_kon proz_marklib proz_leftlib defici netmigr cdum*, vce(rob) //M4

ologit Bew c.netch_sum6##c.proz_sd_3w proz_leftlib proz_gr netmigr cdum*, vce(rob) //M5
